home *** CD-ROM | disk | FTP | other *** search
/ Aminet 31 / Aminet 31 (1999)(Schatztruhe)[!][Jun 1999].iso / Aminet / dev / c / random.lha / random / r250 / r250_test.c < prev    next >
C/C++ Source or Header  |  1999-02-28  |  306b  |  16 lines
  1. /* for SAS/C, Amiga (1999) */
  2.  
  3. extern unsigned int r250(void);
  4. extern void r250_init(int seed);
  5.  
  6. #include <stdio.h>
  7. #include <stdlib.h>
  8. #include <string.h>
  9.  
  10. int main(int argc, char **argv)
  11. {
  12.  r250_init(1802);
  13.  
  14.  printf("result: %ld %ld %ld %ld %ld %ld\n", r250(), r250(), r250(), r250(), r250(), r250());
  15. }
  16.